;; intetion is to break macro defs when not creating scopes for them

(define t1
  (let ((x 1) (y 2))
    (print
     (local-syntax foo (lambda (exp env) (syntax-quote x))
		   (list (foo)
			 (local-syntax foo (lambda (exp env) (syntax-quote y))
				       (foo))
			 (foo))))))
